home *** CD-ROM | disk | FTP | other *** search
/ MacAdvocate 2 / apple-mac-advocate-ii-fall-1997.iso / mac / MacOS / Other Installers / LaserWriter 8.4.1 Installer / LaserWriter Disk 1 / PL.CommonRsrc / PL.CommonRsrc.rsrc / PS_-8156 < prev    next >
Encoding:
Text File  |  1996-09-10  |  1.5 KB  |  110 lines
  1. %%BeginFile: lw8_TrueType-2.0
  2. userdict/LW
  3. statusdict begin product end(LaserWriter)anchorsearch
  4. exch pop
  5. {
  6. dup length 0 eq
  7. {
  8. pop 1
  9. }{
  10. ( Plus)eq
  11. {
  12. 2
  13. }{
  14. 3
  15. }ifelse
  16. }ifelse
  17. }{
  18. 0
  19. }ifelse
  20. put
  21. userdict/patchOK known not{
  22. userdict/patchOK
  23. systemdict/eexec known
  24. systemdict/cexec known and{
  25. countdictstack mark
  26. false
  27. <1861AEDAE118A9F95F1629C0137F8FE656811DD93DFBEA65E947502E78BA12284B8A58EF0A3
  28. 2E272778DAA2ABEC72A84102D591E11D96BA61F57877B895A752D9BEAAC3DFD7D3220E2BDE7
  29. C036467464E0E836748F1DE7AB6216866F130CE7CFCEC8CE050B870C11881EE3E9D70919>
  30. {eexec}stopped{
  31. $error/newerror false put
  32. cleartomark
  33. countdictstack exch sub dup 0 gt{{end}repeat}{pop}ifelse
  34. false
  35. }{
  36. {cleartomark pop true}{cleartomark pop false}ifelse
  37. }ifelse
  38. }{false}ifelse
  39. put
  40. }if
  41. userdict/downloadOK known not
  42. {
  43. userdict/downloadOK
  44. {
  45. patchOK
  46. LW dup 1 ne
  47. exch 2 ne
  48. and
  49. and
  50. vmstatus exch sub
  51. exch pop 120000 gt
  52. and
  53. }bind
  54. put
  55. }if
  56. userdict/type42known known not
  57. {
  58. userdict/type42known
  59. systemdict/resourcestatus known
  60. {
  61. 42/FontType resourcestatus
  62. {
  63. pop pop true
  64. }{
  65. false
  66. }ifelse
  67. }{
  68. false
  69. }ifelse
  70. put
  71. }if
  72. type42known not downloadOK and
  73. userdict/*charpath known not and
  74. {
  75. userdict begin
  76. /*charpath/charpath load def
  77. /charpathflag false def
  78. /charpath
  79. {
  80. userdict/charpathflag true put
  81. userdict/*charpath get exec
  82. userdict/charpathflag false put
  83. }bind def
  84. end
  85. }if
  86. /endstring 0 def
  87. /mystring 0 def
  88. userdict/checkload
  89. {
  90. {
  91. pop exec
  92. }{
  93. save
  94. 3 dict begin
  95. /mystring 6050 string def
  96. exch
  97. /endstring exch def
  98. {
  99. currentfile mystring readline not
  100. {stop}if
  101. endstring eq
  102. {exit}if
  103. }loop
  104. end
  105. restore
  106. pop
  107. }ifelse
  108. }bind
  109. put
  110.